home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / COMMUNIC / 0132.ZIP / M192.C < prev    next >
Text File  |  1984-12-24  |  384b  |  16 lines
  1.  
  2. /* sets baud rate to 19200 */
  3. /* it works -- george lehtola */
  4. /* at least with lattice c compiler */
  5.  
  6. #define lcr_port 0x3fb
  7. #define dll 0x3f8
  8. #define dlm 0x3f9
  9.  
  10. main() {
  11.   outp(lcr_port,inp(lcr_port) | 0x80 );
  12.   outp(dll,6);
  13.   outp(dlm,0);
  14.   outp(lcr_port,inp(lcr_port) & 0x7f);
  15. }